<!--#include file="./top.asp"-->

<%
	dim rs_student, str_student
	set rs_student = server.CreateObject("Adodb.Recordset")
	str_student = "select * from ind_language join student on student.stu_number = ind_language.stu_id where student.stu_grade = 'P4'"
	rs_student.open str_student, conn
	
	response.Write str_student
	response.write rs_student.fields.count
	
'	do while not rs_student.EOF
'		response.Write rs_student.fields(1) & "."
'		rs_student.fields(1) = trim(rs_student.fields(1))
'		rs_student.update
'		rs_student.movenext
'	loop 
%>
</body>
</html>
<%
	rs_student.close
	set rs_student = nothing
	conn.close
	set conn = nothing
%>